(setq load-path (cons (expand-file-name "~/.emacs.d/") load-path))

(require 'server)
(when (and (>= emacs-major-version 23)
	   (equal window-system 'w32))
  (defun server-ensure-safe-dir (dir) "Noop" t)) ; Suppress error "directory
					; ~/.emacs.d/server is unsafe"
					; on windows.
(server-start)

;(add-to-list 'load-path "~/.emacs.d/color-theme")
;(require 'color-theme)
;(eval-after-load "color-theme"
;  '(progn
;     (color-theme-initialize)
;     (color-theme-hober)))

;(load-library "psvn.el")
;(global-visual-line-mode 1)

(setq gnus-select-method '(nnimap "gmail"
                                  (nnimap-address "imap.gmail.com")
                                  (nnimap-server-port 993)
                                  (nnimap-stream ssl)))
(setq gnus-secondary-select-methods '((nntp "news.gwene.org")))
(custom-set-variables
 ;; custom-set-variables was added by Custom.
 ;; If you edit it by hand, you could mess it up, so be careful.
 ;; Your init file should contain only one such instance.
 ;; If there is more than one, they won't work right.
 '(default-input-method "korean-hangul3f")
 '(send-mail-function (quote mailclient-send-it)))

(custom-set-faces
 ;; custom-set-faces was added by Custom.
 ;; If you edit it by hand, you could mess it up, so be careful.
 ;; Your init file should contain only one such instance.
 ;; If there is more than one, they won't work right.
 )

(windmove-default-keybindings 'meta)

(add-to-list 'auto-mode-alist '("\\.org$" . org-mode))
(define-key global-map "\C-ca" 'org-agenda)
;(setq org-log-done 'note)
;(setq org-log-done 'time)
(setq org-log-done t)

;(set-language-environment "Korean")
;(setq default-korean-keyboard "3")

(prefer-coding-system 'utf-8)
(set-file-name-coding-system 'utf-8)
(set-terminal-coding-system 'utf-8)
(set-keyboard-coding-system 'utf-8)
(set-selection-coding-system 'utf-8)
(set-buffer-file-coding-system 'utf-8)

(global-set-key (kbd "S-SPC") 'toggle-input-method)
(global-set-key (kbd "<Hangul>") 'toggle-input-method)
(global-set-key (kbd "<Hangul_Hanja>") 'hangul-to-hanja-conversion)

;(ido-mode)
(setq inhibit-splash-screen t)
;(eshell)
;(calendar)

(setq org-todo-keywords
      '((type "TODO" "WAITING" "DONE")))
;      '((type "TODO" "WAITING" "DONE" "CANCELED")))

;(setq org-todo-keyword-faces
;      '(("TODO" . "red")("DOING" . "red")("DONE" . "green")))

(setq shift-select-mode t)

;(load-file ".emacs.d/graphviz-dot-mode.el")

;some others
;(setq delete-by-moving-to-trash t)
